home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_12_1986_Transactor_Publishing.d64 / cmd wedge.bas (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  2KB  |  71 lines
  1. 100 rem basic loader for command wedge
  2. 110 rem by frank e. digioia 11/18/85
  3. 120 rem sys 49664 to activate
  4. 130 :
  5. 140 for adr=49664 to 50159:read ml
  6. 150 cs=cs+ml:poke adr,ml:next
  7. 160 ifcs<>64559thenprint"error in data"
  8. 170 :
  9. 180 data169, 11,141,  8,  3,169,194,141
  10. 190 data  9,  3, 96, 32,115,  0, 32, 23
  11. 200 data194, 76,174,167, 76, 59,169,201
  12. 210 data 39,240,249,170, 16, 32,162,  0
  13. 220 data141, 68,194,189, 69,194,240, 22
  14. 230 data205, 68,194,240,  3,232,208,243
  15. 240 data138, 10,170,189, 79,194, 72,189
  16. 250 data 78,194, 72, 76,115,  0, 32,121
  17. 260 data  0, 76,237,167,  0,140,137,141
  18. 270 data155,146,147,148,149,  0, 93,194
  19. 280 data234,194,243,194, 13,195, 48,195
  20. 290 data 64,195, 71,195, 61,195,208,  3
  21. 300 data 76, 29,168, 32,197,194,165, 95
  22. 310 data164, 96, 56,233,  1,176,  1,136
  23. 320 data133, 65,132, 66, 32,121,  0,240
  24. 330 data 50, 32,253,174, 32,158,183,138
  25. 340 data240, 41,202,240, 38,160,  4,177
  26. 350 data 65,201,131,208, 31,200,177, 65
  27. 360 data240, 44,201, 58,240, 40,201, 34
  28. 370 data240, 21,201, 44,208,239,202,208
  29. 380 data236,152, 24,101, 65,133, 65,144
  30. 390 data  2,230, 66, 96,169,131, 44,169
  31. 400 data 34,133,251,200,177, 65,240,  6
  32. 410 data197,251,240,209,208,245,169,212
  33. 420 data160,194, 76,105,164, 32,138,173
  34. 430 data 32,247,183, 32, 19,166,176,  3
  35. 440 data 76,227,168, 96, 68, 65, 84, 65
  36. 450 data 32, 69, 76, 69, 77, 69, 78, 84
  37. 460 data 32, 78, 79, 84, 32, 70, 79, 85
  38. 470 data 78, 68,  0, 32,138,173, 32,247
  39. 480 data183, 76,163,168,169,  3, 32,251
  40. 490 data163,165,123, 72,165,122, 72,165
  41. 500 data 58, 72,165, 57, 72,169,141, 72
  42. 510 data 32,235,194, 76,174,167,166, 58
  43. 520 data232,208,  3, 76,156,166,169, 38
  44. 530 data141,  0,  3,169,195,141,  1,  3
  45. 540 data 32,121,  0, 32,156,166,169,139
  46. 550 data141,  0,  3,169,227,141,  1,  3
  47. 560 data 96,240,  3, 76, 45,184, 32,228
  48. 570 data255,240,251,133,  2, 96,169,  1
  49. 580 data 44,169,  0,133, 10,169,  0, 44
  50. 590 data169,  1,141,254,195,169,  0, 32
  51. 600 data189,255,162,  8, 32,219,225,165
  52. 610 data183,240, 19,141,227,195,168,169
  53. 620 data  0,153,238,195,136,177,187,153
  54. 630 data238,195,208,248,240, 38,173,227
  55. 640 data195,240, 33,173,254,195,240, 18
  56. 650 data173,238,195,141,231,195,173,239
  57. 660 data195,141,232,195, 32,171,195, 32
  58. 670 data184,195,173,227,195,162,238,160
  59. 680 data195, 32,189,255,173,254,195,208
  60. 690 data  3, 76,111,225,166, 45,164, 46
  61. 700 data169, 43, 32,216,255,144,  3, 76
  62. 710 data249,224, 96,169, 83,141,228,195
  63. 720 data169,  0,141,237,195, 76,197,195
  64. 730 data169, 82,141,228,195,169, 61,141
  65. 740 data237,195, 76,197,195,169,  8,133
  66. 750 data186, 32,177,255,169,111,133,185
  67. 760 data 32,147,255,162,  0,189,228,195
  68. 770 data240,  6, 32,168,255,232,208,245
  69. 780 data 76,174,255,  0, 83, 48, 58,  0
  70. 790 data  0, 46, 66, 65, 75,  0,255,255
  71.